home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 2005 July / Macworld CD 17.05.iso / Data / Main.dxr / 00029_Movie runner handler.ls < prev    next >
Encoding:
Text File  |  2000-02-28  |  619 b   |  20 lines
  1. property appPath, generalPath, filePath
  2.  
  3. on new me
  4.   return me
  5. end
  6.  
  7. on getPropertyDescriptionList me
  8.   description = [:]
  9.   addProp(description, #generalPath, [#default: EMPTY, #format: #string, #comment: "Pathname of the folder:"])
  10.   addProp(description, #filePath, [#default: "none", #format: #string, #comment: "Pathname of the file:"])
  11.   addProp(description, #appPath, [#default: "none", #format: #string, #comment: "Pathname of the app the launch:"])
  12.   return description
  13. end
  14.  
  15. on mouseUp me
  16.   if (appPath <> "none") and (filePath <> "none") then
  17.     open(generalPath & filePath, generalPath & appPath)
  18.   end if
  19. end
  20.